home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 21 / Cream of the Crop 21 (Terry Blount) (October 1996).iso / os2 / nortutil.zip / src / Kraut / kraut.l next >
Text File  |  1996-08-28  |  3KB  |  110 lines

  1. BW [      ]
  2. EW [      .,;!?]
  3.  
  4. %{
  5.      char buf[256];
  6.  
  7. %}
  8.  
  9. %%
  10. ing        return((int) "ingkt");
  11. " the "        return((int) " ze ");
  12. "The "        return((int) "Ze ");
  13. " with "    return((int) " mitt ");
  14. "With "        return((int) "Mitt ");
  15. " is"        return((int) " iss");
  16. " Is"        return((int) " Iss");
  17. wr        return((int) "w-r-r");
  18. Wr        return((int) "W-r-r");
  19. R        return((int) "R-r-r");
  20. "Yes "        return((int) "Jawohl ");
  21. " r"        return((int) " r-r-r");
  22. "Yes."        return((int) "Jawohl.");
  23. "Yes!"        return((int) "Jawohl!");
  24. "YES!"        return((int) "JAWOHL!");
  25. " yes "        return((int) " ja ");
  26. " yes."        return((int) " ja.");
  27. " yes!"        return((int) " yes!");
  28. "No "        return((int) "Nein ");
  29. "No!"        return((int) "Nein!");
  30. "No?"        return((int) "Nein?");
  31. " no "        return((int) " nein ");
  32. " no."        return((int) " nein.");
  33. " no!"        return((int) " nein!");
  34. " no?"        return((int) " nein?");
  35. " not"        return((int) " nicht");
  36. "Not"        return((int) "Nicht");
  37. [Mm]"r."    return((int) "Herr");
  38. [Mm]"rs."    return((int) "Frau");
  39. Miss        return((int) "Fraulein");
  40. " of "        return((int) " uff ");
  41. "Of "        return((int) "Uff ");
  42. my        return((int) "mein");
  43. My        return((int) "Mein");
  44. " and "        return((int) " undt ");
  45. "And "        return((int) "Undt ");
  46. "and"        return((int) "ent");
  47. "One "        return((int) "Ein ");
  48. " one"        return((int) " ein");
  49. "Is "        return((int) "Ist ");
  50. " is "        return((int) " ist ");
  51. "ow "        return((int) "ow ");
  52. "w "        return((int) "w ");
  53. " sc"        return((int) " shc");
  54. "Sc"        return((int) "Shc");
  55. " st"        return((int) " sht");
  56. "St"        return((int) "Sht");
  57. sh        return((int) "sch");
  58. Sh        return((int) "Sch");
  59. ch        return((int) "ch");
  60. Ch        return((int) "Ch");
  61. " c"        return((int) " k");
  62. " C"        return((int) " K");
  63. " for "        return((int) " fur ");
  64. Have        return((int) "Haf");
  65. have        return((int) "haf");
  66. j        return((int) "ch");
  67. J        return((int) "Ch");
  68. Qu        return((int) "Qv");
  69. qu        return((int) "qv");
  70. rd        return((int) "rt");
  71. v        return((int) "f");
  72. V        return((int) "F");
  73. " w"        return((int) " v");
  74. W        return((int) "V");
  75. ward        return((int) "verrt");
  76. wh        return((int) "v");
  77. Wh        return((int) "V");
  78. " th"        return((int) " z");
  79. "Th"        return((int) "Z");
  80. "th"        return((int) "zz");
  81. [Cc]offee    return((int) "Kafe");
  82. [Tt]hank[s]*    return((int) "Danke");
  83. [Jj]ohn        return((int) "Johann");
  84. [Ww]illiam    return((int) "Wilhelm");
  85. [Bb]rad        return((int) "Wilhelm");
  86. [Gg]ary        return((int) "Gerhardt");
  87. [Jj]on        return((int) "Hansel");
  88.  
  89. [a-f]"!"   {sprintf(buf,"%s Naturlich!",yytext);return((int) buf);}
  90. [p-z]"!"   {sprintf(buf,"%s Seig Heil!",yytext);return((int) buf);}
  91. .       return((int) yytext);
  92. \n       return((int) "\n");
  93.  
  94. %%
  95.  
  96.  
  97. main()
  98. {
  99.     char *line;
  100.  
  101.     while (line = (char *) yylex()) {
  102.         printf("%s", line);
  103.     }
  104. }
  105.  
  106. yywrap()
  107. {
  108.     return (1);
  109. }
  110.